package com.douqu.game.main.util;
import com.douqu.game.core.util.LogUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import sun.misc.BASE64Encoder;

import java.io.UnsupportedEncodingException;
import java.security.*;
import java.security.spec.InvalidKeySpecException;

import javax.crypto.*;
import javax.crypto.spec.DESKeySpec;

/**
 * DES加密和解密工具,可以对字符串进行加密和解密操作  。 
 */
public class DesUtils {

  /** 字符串默认键值     */
  public static String KEY = "douqugame";
  /**
   * 密钥算法
   */
  private static final String ALGORITHM = "DES";
  /**
   * 加解密算法/工作模式/填充方式
   */
  private static final String ALGORITHM_STR = "DES/ECB/NoPadding";

  private static final String CHARSET = "UTF-8";

  /**
   * 填充内容
   */
  private static final String PAD_STR = "\0";


  /** 加密工具     */
  private Cipher encryptCipher = null;

  /** 解密工具     */
  private Cipher decryptCipher = null;

  private static DesUtils instance = null;

  public static DesUtils getInstance()
  {
    if(instance == null)
      instance = new DesUtils();

    return instance;
  }

  /**
   * 将byte数组转换为表示16进制值的字符串， 如：byte[]{8,18}转换为：0813， 和public static byte[]  
   * hexStr2ByteArr(String strIn) 互为可逆的转换过程  
   *
   * @param arrB
   *            需要转换的byte数组  
   * @return 转换后的字符串
   * @throws Exception
   *             本方法不处理任何异常，所有异常全部抛出  
   */
  public static String byteArr2HexStr(byte[] arrB) throws Exception {
    int iLen = arrB.length;
    // 每个byte用两个字符才能表示，所以字符串的长度是数组长度的两倍   
    StringBuffer sb = new StringBuffer(iLen * 2);
    for (int i = 0; i < iLen; i++) {
      int intTmp = arrB[i];
      // 把负数转换为正数   
      while (intTmp < 0) {
        intTmp = intTmp + 256;
      }
      // 小于0F的数需要在前面补0   
      if (intTmp < 16) {
        sb.append("0");
      }
      sb.append(Integer.toString(intTmp, 16));
    }
    return sb.toString();
  }

  /**
   * 将表示16进制值的字符串转换为byte数组， 和public static String byteArr2HexStr(byte[] arrB)  
   * 互为可逆的转换过程  
   *
   * @param strIn
   *            需要转换的字符串  
   * @return 转换后的byte数组
   * @throws Exception
   *             本方法不处理任何异常，所有异常全部抛出  
   * @author <a href="mailto:leo841001@163.com">LiGuoQing</a>  
   */
  public static byte[] hexStr2ByteArr(String strIn) throws Exception {
    byte[] arrB = strIn.getBytes();
    int iLen = arrB.length;

    // 两个字符表示一个字节，所以字节数组长度是字符串长度除以2   
    byte[] arrOut = new byte[iLen / 2];
    for (int i = 0; i < iLen; i = i + 2) {
      String strTmp = new String(arrB, i, 2);
      arrOut[i / 2] = (byte) Integer.parseInt(strTmp, 16);
    }
    return arrOut;
  }



  /**
   * 指定密钥构造方法  
   *
   * @throws Exception
   */
  public DesUtils() {

    Security.addProvider(new com.sun.crypto.provider.SunJCE());

    try {
      Key key = getKey(KEY.getBytes());

      encryptCipher = Cipher.getInstance("DES");
      encryptCipher.init(Cipher.ENCRYPT_MODE, key);

      decryptCipher = Cipher.getInstance("DES");
      decryptCipher.init(Cipher.DECRYPT_MODE, key);
    } catch (Exception e) {
      e.printStackTrace();
    }
  }

  /**
   * 加密字节数组  
   *
   * @param arrB
   *            需加密的字节数组  
   * @return 加密后的字节数组
   * @throws Exception
   */
  public byte[] encrypt(byte[] arrB) throws Exception {
    return encryptCipher.doFinal(arrB);
  }

  /**
   * 加密字符串  
   *
   * @param strIn
   *            需加密的字符串  
   * @return 加密后的字符串
   * @throws Exception
   */
  public String encrypt(String strIn) throws Exception {
    return byteArr2HexStr(encrypt(strIn.getBytes()));
  }

  /**
   * 解密字节数组  
   *
   * @param arrB
   *            需解密的字节数组  
   * @return 解密后的字节数组
   * @throws Exception
   */
  public byte[] decrypt(byte[] arrB) throws Exception {
    return decryptCipher.doFinal(arrB);
  }

  /**
   * 解密字符串  
   *
   * @param strIn
   *            需解密的字符串  
   * @return 解密后的字符串
   * @throws Exception
   */
  public String decrypt(String strIn) throws Exception {
    return new String(decrypt(hexStr2ByteArr(strIn)));
  }

  /**
   * 从指定字符串生成密钥，密钥所需的字节数组长度为8位 不足8位时后面补0，超出8位只取前8位  
   *
   * @param arrBTmp
   *            构成该字符串的字节数组  
   * @return 生成的密钥
   * @throws java.lang.Exception
   */
  private Key getKey(byte[] arrBTmp) throws Exception {
    // 创建一个空的8位字节数组（默认值为0）   
    byte[] arrB = new byte[8];

    // 将原始字节数组转换为8位   
    for (int i = 0; i < arrBTmp.length && i < arrB.length; i++) {
      arrB[i] = arrBTmp[i];
    }

    // 生成密钥   
    Key key = new javax.crypto.spec.SecretKeySpec(arrB, "DES");

    return key;
  }
  /**
   * ECB加密
   * @param souce 需加密的数据
   * @param key 秘钥
   * @return
   */
  public static String encrypt(String souce, String key) {
    try {
      return encryptByDes(pkcs5Pad(souce), pkcs5Pad(key));
    } catch (Exception e) {
      LogUtils.error("加密数据:" + souce + " 异常,原因：" + e.getMessage() + "" + e);
    }

    return "";
  }

  /**
   * 将需要加密的数据填充成8的倍数
   * @param souce 需加密的数据
   * @return
   */
  private static String pkcs5Pad(final String souce) {
    //密文和密钥的长度必须是8的倍数
    if (0 == souce.length() % 8) {
      return souce;
    }
    StringBuffer tmp = new StringBuffer(souce);
    while (0 != tmp.length() % 8) {
      tmp.append(PAD_STR);
    }
    return tmp.toString();
  }

  /**
   * des +base64生成加密字符串
   * @param souce 数据源
   * @param key 密码
   * @return
   * @throws InvalidKeyException
   * @throws NoSuchAlgorithmException
   * @throws InvalidKeySpecException
   * @throws NoSuchPaddingException
   * @throws IllegalBlockSizeException
   * @throws BadPaddingException
   * @throws UnsupportedEncodingException
   */
  private static String encryptByDes(final String souce, final String key) throws InvalidKeyException,
          NoSuchAlgorithmException, InvalidKeySpecException, NoSuchPaddingException,
          IllegalBlockSizeException, BadPaddingException, UnsupportedEncodingException {
    // DES算法要求有一个可信任的随机数源
    SecureRandom sr = new SecureRandom();
    // 从原始密匙数据创建DESKeySpec对象
    DESKeySpec dks = new DESKeySpec(key.getBytes(CHARSET));
    // 创建一个密匙工厂，然后用它把DESKeySpec转换成 一个SecretKey对象
    SecretKeyFactory keyFactory = SecretKeyFactory.getInstance(ALGORITHM);
    SecretKey key1 = keyFactory.generateSecret(dks);
    // Cipher对象实际完成加密操作
    Cipher cipher = Cipher.getInstance(ALGORITHM_STR);
    // 用密匙初始化Cipher对象
    cipher.init(Cipher.ENCRYPT_MODE, key1, sr);
    // 现在，获取数据并加密
    byte encryptedData[] = cipher.doFinal(souce.getBytes(CHARSET));
    // 通过BASE64位编码成字符创形式
    String base64Str = new BASE64Encoder().encode(encryptedData);
    return base64Str;
  }
}